(select-safe-coding-system): If default-coding-system is no-conversion,

return that; it is always safe.

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index abda95f64dd22a459326d7507b6fefb68824d789..f075a5affbc449cad1ac56ca96c9a55736dddbbd 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -378,6 +378,7 @@ and TO is ignored."
                     (find-charset-region from to)))
         (safe-coding-systems (find-coding-systems-for-charsets charsets)))
     (if (or (eq (car safe-coding-systems) 'undecided)
+           (eq default-coding-system 'no-conversion)
            (and default-coding-system
                 (memq (coding-system-base default-coding-system)
                       safe-coding-systems)))